home *** CD-ROM | disk | FTP | other *** search
/ Developer Source 4 / developer source - volume 4.iso / parad / jul94 / mmfig21b.gif < prev    next >
Graphics Interchange Format  |  1996-07-02  |  36.0 KB  |  581x343  |  4-bit (14 colors)
   ocr: MOVERiFormlHopen nethod ppen(var eventinfo Event) if eventinfo.1sPrefilter() then This code executes for each object on the form. else - This code executes only for the form. I doDefault CursorLibrary.open(":WORK-CURSORS.LSL") hModule = GetModuleHandle("-WORK:CURSORS.LSL") if hModule < 0 then hCursor = Loadtursor(hmodule, PUINTER") if hcursor = 0 then m5gInfoc"Problem", "Could not load cursor resource POINTER") endif else nsgInforrrobiem", "Could not load library CURSORS") endif endif endMethod Edit Line: 1 Col: 1